home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 November / Chip_2004-11_cd1.bin / software / frigate / Frigate3_Lite_v25.exe / {app} / Addons / Schemes / Oberon.sch < prev    next >
Text File  |  2004-01-06  |  3KB  |  107 lines
  1. object TPersHolder
  2.   P.Name = 'Oberon'
  3.   P.SyntaxBlocks = <
  4.     item
  5.       Name = 'Default'
  6.       CaseSensitive = True
  7.       FIText = 0
  8.       FIIntNum = 3
  9.       FIFloatNum = 4
  10.       FIHexNum = 5
  11.       UseComments = True
  12.       UseMultiLineComments = True
  13.       UseStrings = True
  14.       UseSingleLineStrings = True
  15.       UseNumbers = True
  16.       UseSuffixedNumbers = True
  17.       UseMultipleNumSuffixes = False
  18.       UseKeywords = True
  19.       BlockDelimiters = <>
  20.       MultiLineCommentDelimiters = <
  21.         item
  22.           FontID = 1
  23.           LeftDelimiter = '(*'
  24.           RightDelimiter = '*)'
  25.         end>
  26.       SingleLineStringDelimiters = <
  27.         item
  28.           FontID = 2
  29.           LeftDelimiter = '"'
  30.           RightDelimiter = '"'
  31.         end>
  32.       NumSuffixes = <
  33.         item
  34.           LeftDelimiter = 'H'
  35.         end
  36.         item
  37.           LeftDelimiter = 'X'
  38.         end>
  39.       KeywordSets = <
  40.         item
  41.           FontID = 6
  42.           Name = 'reserved'
  43.           Keywords = 
  44.             'ARRAY,BEGIN,CASE,CONST,DIV,DO,ELSE,ELSIF,END,EXIT,IF,IMPORT,IN,I' +
  45.             'S,LOOP,MOD,MODULE,NIL,OF,OR,POINTER,PROCEDURE,RECORD,REPEAT,RETU' +
  46.             'RN,THEN,TO,TYPE,UNTIL,VAR,WHILE,WITH'
  47.         end>
  48.     end>
  49.   P.FontTable = <
  50.     item
  51.       FontID = 0
  52.       Font.Charset = DEFAULT_CHARSET
  53.       Font.Color = clBlack
  54.       Font.Height = -13
  55.       Font.Name = 'Courier New'
  56.       Font.Style = []
  57.     end
  58.     item
  59.       FontID = 1
  60.       Font.Charset = DEFAULT_CHARSET
  61.       Font.Color = clGray
  62.       Font.Height = -13
  63.       Font.Name = 'Courier New'
  64.       Font.Style = [fsItalic]
  65.     end
  66.     item
  67.       FontID = 2
  68.       Font.Charset = DEFAULT_CHARSET
  69.       Font.Color = clMaroon
  70.       Font.Height = -13
  71.       Font.Name = 'Courier New'
  72.       Font.Style = []
  73.     end
  74.     item
  75.       FontID = 3
  76.       Font.Charset = DEFAULT_CHARSET
  77.       Font.Color = clGreen
  78.       Font.Height = -13
  79.       Font.Name = 'Courier New'
  80.       Font.Style = []
  81.     end
  82.     item
  83.       FontID = 4
  84.       Font.Charset = DEFAULT_CHARSET
  85.       Font.Color = clGreen
  86.       Font.Height = -13
  87.       Font.Name = 'Courier New'
  88.       Font.Style = []
  89.     end
  90.     item
  91.       FontID = 5
  92.       Font.Charset = DEFAULT_CHARSET
  93.       Font.Color = clGreen
  94.       Font.Height = -13
  95.       Font.Name = 'Courier New'
  96.       Font.Style = []
  97.     end
  98.     item
  99.       FontID = 6
  100.       Font.Charset = DEFAULT_CHARSET
  101.       Font.Color = clBlue
  102.       Font.Height = -13
  103.       Font.Name = 'Courier New'
  104.       Font.Style = [fsBold]
  105.     end>
  106. end
  107.